object frmGlassesFirmDlg: TfrmGlassesFirmDlg
  Left = 279
  Top = 132
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'frmGlassesFirmDlg'
  ClientHeight = 328
  ClientWidth = 455
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object pnlMain: TPanel
    Left = 8
    Top = 16
    Width = 441
    Height = 273
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object lblFirm: TLabel
      Left = 8
      Top = 16
      Width = 49
      Height = 19
      AutoSize = False
      Caption = 'Firm'
    end
    object lblAddress: TLabel
      Left = 8
      Top = 40
      Width = 49
      Height = 19
      AutoSize = False
      Caption = 'Address'
    end
    object lblPhone: TLabel
      Left = 8
      Top = 64
      Width = 49
      Height = 19
      AutoSize = False
      Caption = 'Phone'
    end
    object Panel1: TPanel
      Left = 8
      Top = 96
      Width = 425
      Height = 169
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 1
      object barMain: TToolBar
        Left = 2
        Top = 2
        Width = 421
        Height = 33
        BorderWidth = 1
        ButtonHeight = 27
        ButtonWidth = 27
        DisabledImages = frmMain.disableImageList
        EdgeBorders = [ebBottom]
        Flat = True
        Images = frmMain.hotImageList
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        object btnUpdate: TToolButton
          Left = 0
          Top = 0
          Hint = 'Update model'
          Caption = 'btnUpdate'
          ImageIndex = 0
          OnClick = btnUpdateClick
        end
        object btnAdd: TToolButton
          Left = 27
          Top = 0
          Hint = 'Add new model'
          Caption = 'btnAdd'
          ImageIndex = 1
          OnClick = btnAddClick
        end
        object btnDelete: TToolButton
          Left = 54
          Top = 0
          Hint = 'Delete model'
          Caption = 'btnDelete'
          ImageIndex = 2
          OnClick = btnDeleteClick
        end
      end
      object grdModels: TStringGrid
        Left = 8
        Top = 43
        Width = 409
        Height = 118
        ColCount = 4
        DefaultRowHeight = 18
        FixedCols = 0
        RowCount = 2
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
        ScrollBars = ssVertical
        TabOrder = 1
        OnKeyDown = grdModelsKeyDown
        ColWidths = (
          124
          86
          93
          98)
      end
    end
    object edtFirm: TEdit
      Left = 56
      Top = 16
      Width = 209
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 50
      TabOrder = 0
    end
    object edtAddress: TEdit
      Left = 56
      Top = 40
      Width = 209
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 50
      TabOrder = 2
    end
    object edtPhone: TEdit
      Left = 56
      Top = 64
      Width = 209
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 50
      TabOrder = 3
    end
  end
  object btnOk: TBitBtn
    Left = 168
    Top = 296
    Width = 89
    Height = 25
    TabOrder = 1
    OnClick = btnOKClick
    Kind = bkOK
  end
  object btnHelp: TBitBtn
    Left = 360
    Top = 296
    Width = 89
    Height = 25
    TabOrder = 2
    Kind = bkHelp
  end
  object btnCancel: TBitBtn
    Left = 264
    Top = 296
    Width = 89
    Height = 25
    TabOrder = 3
    Kind = bkCancel
  end
end
